static void
dummy( void ) __naked {
  // void _decdptr (char *gptr)
  /* the return value is already in dph/dpl */
  __asm
  .globl  __decdptr
  __decdptr:

  #ifdef __SDCC_ds390
  orl     dps, #0xc0
  inc     dptr
  anl     dps, #0x3f
  #else
  xch     a, dpl
  jnz     00001$
  dec     dph
  00001$:
  dec     a
  xch     a, dpl
  #endif
  ret
  __endasm;
}
